inherited dtmda_Stock: Tdtmda_Stock
  OldCreateOrder = True
  Left = 389
  Top = 395
  Height = 371
  Width = 713
  inherited adsMaster: TADODataSet
    CursorType = ctStatic
    CommandText = 'select * from da_Stock where 0=1'
    Top = 48
    object adsMasterStockID: TStringField
      DisplayLabel = #20179#24211'ID'
      FieldName = 'StockID'
    end
    object adsMasterStockCode: TStringField
      DisplayLabel = #20179#24211#32534#30721
      FieldName = 'StockCode'
    end
    object adsMasterStockName: TStringField
      DisplayLabel = #20179#24211#21517#31216
      FieldName = 'StockName'
    end
    object adsMasterStockType: TWordField
      DisplayLabel = #20179#24211#31867#22411'ID'
      FieldName = 'StockType'
    end
    object adsMasterres_StockTypeName: TStringField
      DisplayLabel = #20179#24211#31867#22411
      FieldKind = fkLookup
      FieldName = 'res_StockTypeName'
      LookupDataSet = adsStockType
      LookupKeyFields = 'ID'
      LookupResultField = 'Name'
      KeyFields = 'StockType'
      Lookup = True
    end
    object adsMasterDeptID: TStringField
      DisplayLabel = #20844#21496'ID'
      FieldName = 'DeptID'
    end
    object adsMasterHasBarCode: TBooleanField
      DisplayLabel = #26465#24418#30721#31649#29702
      FieldName = 'HasBarCode'
    end
    object adsMasterHasStop: TBooleanField
      DisplayLabel = #31105#29992#21542
      FieldName = 'HasStop'
    end
    object adsMasterHasUse: TBooleanField
      DisplayLabel = #20351#29992#21542
      FieldName = 'HasUse'
    end
    object adsMasterHasSysDefine: TBooleanField
      DisplayLabel = #31995#32479#23450#20041#21542
      FieldName = 'HasSysDefine'
    end
    object adsMasterHasDefault: TBooleanField
      DisplayLabel = #40664#35748#21542
      FieldName = 'HasDefault'
    end
    object adsMasterStoper: TStringField
      DisplayLabel = #31105#29992#20154
      FieldName = 'Stoper'
    end
    object adsMasterStopDate: TDateTimeField
      DisplayLabel = #31105#29992#26085#26399
      FieldName = 'StopDate'
    end
    object adsMasterStopMemo: TStringField
      DisplayLabel = #31105#29992#35828#26126
      FieldName = 'StopMemo'
    end
    object adsMasterHasCheck: TBooleanField
      DisplayLabel = #23457#26680#21542
      FieldName = 'HasCheck'
    end
    object adsMasterChecker: TStringField
      DisplayLabel = #23457#26680#20154
      FieldName = 'Checker'
    end
    object adsMasterCheckTime: TDateTimeField
      DisplayLabel = #23457#26680#26102#38388
      FieldName = 'CheckTime'
    end
    object adsMasterWriter: TStringField
      DisplayLabel = #39318#36755#20154
      FieldName = 'Writer'
    end
    object adsMasterWriteTime: TDateTimeField
      DisplayLabel = #39318#36755#26102#38388
      FieldName = 'WriteTime'
    end
    object adsMasterModifier: TStringField
      DisplayLabel = #20462#25913#20154
      FieldName = 'Modifier'
    end
    object adsMasterModifyTime: TDateTimeField
      DisplayLabel = #20462#25913#26102#38388
      FieldName = 'ModifyTime'
    end
    object adsMasterRemark: TStringField
      DisplayLabel = #22791#27880
      FieldName = 'Remark'
      Size = 50
    end
  end
  inherited adsMasterEdit: TADODataSet
    CursorType = ctStatic
    CommandText = 'select * from da_Stock'
    object adsMasterEditStockID: TStringField
      DisplayLabel = #20179#24211'ID'
      FieldName = 'StockID'
    end
    object adsMasterEditStockCode: TStringField
      DisplayLabel = #20179#24211#32534#30721
      FieldName = 'StockCode'
    end
    object adsMasterEditStockName: TStringField
      DisplayLabel = #20179#24211#21517#31216
      FieldName = 'StockName'
      OnChange = adsMasterEditStockNameChange
    end
    object adsMasterEditStockType: TWordField
      DisplayLabel = #20179#24211#31867#22411'ID'
      FieldName = 'StockType'
    end
    object adsMasterEditres_StockTypeName: TStringField
      DisplayLabel = #20179#24211#31867#22411
      FieldKind = fkLookup
      FieldName = 'res_StockTypeName'
      LookupDataSet = adsStockType
      LookupKeyFields = 'ID'
      LookupResultField = 'Name'
      KeyFields = 'StockType'
      Lookup = True
    end
    object adsMasterEditHelperCode: TStringField
      DisplayLabel = #21161#35760#30721
      FieldName = 'HelperCode'
      Size = 50
    end
    object adsMasterEditDeptID: TStringField
      DisplayLabel = #20844#21496'ID'
      FieldName = 'DeptID'
    end
    object adsMasterEditres_DeptName: TStringField
      DisplayLabel = #25152#23646#37096#38376
      FieldKind = fkLookup
      FieldName = 'res_DeptName'
      LookupDataSet = adsDepartment
      LookupKeyFields = 'DeptID'
      LookupResultField = 'DeptName'
      KeyFields = 'DeptID'
      Size = 50
      Lookup = True
    end
    object adsMasterEditStockRuleID: TStringField
      DisplayLabel = #20179#24211#35268#21017'ID'
      FieldName = 'StockRuleID'
      Size = 50
    end
    object adsMasterEditExportType: TStringField
      DisplayLabel = #23545#22806#31867#22411
      FieldName = 'ExportType'
      Size = 1
    end
    object adsMasterEditSupplyID: TStringField
      DisplayLabel = #21152#24037#21378'ID'
      FieldName = 'SupplyID'
    end
    object adsMasterEditHasClearStock: TBooleanField
      DisplayLabel = #28165#31354#38646#24211#23384
      FieldName = 'HasClearStock'
    end
    object adsMasterEditHasBarCode: TBooleanField
      DisplayLabel = #26465#30721#31649#29702
      FieldName = 'HasBarCode'
    end
    object adsMasterEditHasUse2: TBooleanField
      DisplayLabel = #20351#29992#21542
      FieldName = 'HasUse'
    end
    object adsMasterEditHasSysDefine: TBooleanField
      DisplayLabel = #31995#32479#23450#20041#21542
      FieldName = 'HasSysDefine'
    end
    object adsMasterEditHasDefault: TBooleanField
      DisplayLabel = #40664#35748#21542
      FieldName = 'HasDefault'
    end
    object adsMasterEditHasStop2: TBooleanField
      DisplayLabel = #31105#29992#21542
      FieldName = 'HasStop'
    end
    object adsMasterEditStoper2: TStringField
      DisplayLabel = #31105#29992#20154
      FieldName = 'Stoper'
    end
    object adsMasterEditStopDate: TDateTimeField
      DisplayLabel = #31105#29992#26085#26399
      FieldName = 'StopDate'
    end
    object adsMasterEditStopMemo2: TStringField
      DisplayLabel = #31105#29992#35828#26126
      FieldName = 'StopMemo'
    end
    object adsMasterEditHasCheck2: TBooleanField
      DisplayLabel = #23457#26680#21542
      FieldName = 'HasCheck'
    end
    object adsMasterEditChecker2: TStringField
      DisplayLabel = #23457#26680#20154
      FieldName = 'Checker'
    end
    object adsMasterEditCheckTime2: TDateTimeField
      DisplayLabel = #23457#26680#26102#38388
      FieldName = 'CheckTime'
    end
    object adsMasterEditWriter2: TStringField
      DisplayLabel = #39318#36755#20154
      FieldName = 'Writer'
    end
    object adsMasterEditWriteTime2: TDateTimeField
      DisplayLabel = #39318#36755#26102#38388
      FieldName = 'WriteTime'
    end
    object adsMasterEditModifier2: TStringField
      DisplayLabel = #20462#25913#20154
      FieldName = 'Modifier'
    end
    object adsMasterEditModifyTime2: TDateTimeField
      DisplayLabel = #20462#25913#26102#38388
      FieldName = 'ModifyTime'
    end
    object adsMasterEditRemark2: TStringField
      DisplayLabel = #22791#27880
      FieldName = 'Remark'
      Size = 50
    end
    object adsMasterEditres_SupplyName: TStringField
      DisplayLabel = #21152#24037#21378#21517#31216
      FieldKind = fkLookup
      FieldName = 'res_SupplyName'
      LookupDataSet = res_Supply
      LookupKeyFields = 'SupplyID'
      LookupResultField = 'SupplyShortName'
      KeyFields = 'SupplyID'
      Size = 50
      Lookup = True
    end
  end
  object adsStockType: TADODataSet
    Active = True
    Connection = dtmConnect.conMain
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    CommandText = 
      'select ID, Code, Name from V_da_StockType where isnull(HasStop,0' +
      ')=0'
    Parameters = <>
    Left = 176
    Top = 48
    object adsStockTypeID: TStringField
      FieldName = 'ID'
    end
    object adsStockTypeCode: TStringField
      FieldName = 'Code'
    end
    object adsStockTypeName: TStringField
      FieldName = 'Name'
      Size = 50
    end
  end
  object adsUserCompany: TADODataSet
    Connection = dtmConnect.conMain
    LockType = ltBatchOptimistic
    CommandText = 
      'select b.DeptID, b.DeptCode, b.DeptName from xt_CompanySet a '#13#10'j' +
      'oin da_Department b on a.CompanyID=b.DeptID'#13#10'where a.UserID=(sel' +
      'ect UserID from xt_Users where UserCode=:UserCode)'
    Parameters = <
      item
        Name = 'UserCode'
        Size = -1
        Value = Null
      end>
    Left = 288
    Top = 48
  end
  object adsDepartment: TADODataSet
    Active = True
    Connection = dtmConnect.conMain
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    CommandText = 
      'select DeptID, DeptCode, DeptName, DeptFullName'#13#10' from V_da_Depa' +
      'rtment where DeptType=1'#13#10'order by DeptID'
    Parameters = <>
    Left = 176
    Top = 112
  end
  object res_Supply: TADODataSet
    Active = True
    Connection = dtmConnect.conMain
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    CommandText = 
      'Select SupplyID, SupplyCode, SupplyShortName, SupplyFullName fro' +
      'm V_da_Supply'
    Parameters = <>
    Left = 288
    Top = 112
  end
end
